home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 February / EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso / earcd / patches / pgs3f.lha / 3.0fUpdate / FilterAI.LHA / IllustratorEPS.header < prev   
Text File  |  1995-02-06  |  13KB  |  878 lines
  1. %%DocumentSuppliedResources: procset Adobe_packedarray 2.0 0
  2. %%+ procset Adobe_cmykcolor 1.1 0
  3. %%+ procset Adobe_cshow 1.1 0
  4. %%+ procset Adobe_customcolor 1.0 0
  5. %%+ procset Adobe_IllustratorA_AI3 1.0 1
  6. %%EndComments
  7. %%BeginProlog
  8. %%BeginResource: procset Adobe_packedarray 2.0 0
  9. %%Title: (Packed Array Operators)
  10. %%Version: 2.0
  11. %%CreationDate: (8/2/90) ()
  12. %%Copyright: ((C) 1987-1990 Adobe Systems Incorporated All Rights Reserved)
  13. userdict /Adobe_packedarray 5 dict dup begin put
  14. /initialize            % - initialize -
  15. {
  16. /packedarray where
  17.     {
  18.     pop
  19.     }
  20.     {
  21.     Adobe_packedarray begin
  22.     Adobe_packedarray
  23.         {
  24.         dup xcheck
  25.             {
  26.             bind
  27.             } if
  28.         userdict 3 1 roll put
  29.         } forall
  30.     end
  31.     } ifelse
  32. } def
  33. /terminate            % - terminate -
  34. {
  35. } def
  36. /packedarray        % arguments count packedarray array
  37. {
  38. array astore readonly
  39. } def
  40. /setpacking            % boolean setpacking -
  41. {
  42. pop
  43. } def
  44. /currentpacking        % - setpacking boolean
  45. {
  46. false
  47. } def
  48. currentdict readonly pop end
  49. %%EndResource
  50. Adobe_packedarray /initialize get exec
  51. %%BeginResource: procset Adobe_cmykcolor 1.1 0
  52. %%Title: (CMYK Color Operators)
  53. %%Version: 1.1
  54. %%CreationDate: (1/23/89) ()
  55. %%Copyright: ((C) 1987-1990 Adobe Systems Incorporated All Rights Reserved)
  56. currentpacking true setpacking
  57. userdict /Adobe_cmykcolor 4 dict dup begin put
  58. /initialize            % - initialize -
  59. {
  60. /setcmykcolor where
  61.     {
  62.     pop
  63.     }
  64.     {
  65.     userdict /Adobe_cmykcolor_vars 2 dict dup begin put
  66.     /_setrgbcolor
  67.         /setrgbcolor load def
  68.     /_currentrgbcolor
  69.         /currentrgbcolor load def
  70.     Adobe_cmykcolor begin
  71.     Adobe_cmykcolor
  72.         {
  73.         dup xcheck
  74.             {
  75.             bind
  76.             } if
  77.         pop pop
  78.         } forall
  79.     end
  80.     end
  81.     Adobe_cmykcolor begin
  82.     } ifelse
  83. } def
  84. /terminate            % - terminate -
  85. {
  86. currentdict Adobe_cmykcolor eq
  87.     {
  88.     end
  89.     } if
  90. } def
  91. /setcmykcolor        % cyan magenta yellow black setcmykcolor -
  92. {
  93. 1 sub 4 1 roll
  94. 3
  95.     {
  96.     3 index add neg dup 0 lt
  97.         {
  98.         pop 0
  99.         } if
  100.     3 1 roll
  101.     } repeat
  102. Adobe_cmykcolor_vars /_setrgbcolor get exec
  103. pop
  104. } def
  105. /currentcmykcolor    % - currentcmykcolor cyan magenta yellow black
  106. {
  107. Adobe_cmykcolor_vars /_currentrgbcolor get exec
  108. 3
  109.     {
  110.     1 sub neg 3 1 roll
  111.     } repeat
  112. 0
  113. } def
  114. currentdict readonly pop end
  115. setpacking
  116. %%EndResource
  117. %%BeginResource: procset Adobe_cshow 1.1 0
  118. %%Title: (cshow Operator)
  119. %%Version: 1.1
  120. %%CreationDate: (1/23/89) ()
  121. %%Copyright: ((C) 1987-1990 Adobe Systems Incorporated All Rights Reserved)
  122. currentpacking true setpacking
  123. userdict /Adobe_cshow 3 dict dup begin put
  124. /initialize            % - initialize -
  125. {
  126. /cshow where
  127.     {
  128.     pop
  129.     }
  130.     {
  131.     userdict /Adobe_cshow_vars 1 dict dup begin put
  132.     /_cshow        % - _cshow proc
  133.         {} def
  134.     Adobe_cshow begin
  135.     Adobe_cshow
  136.         {
  137.         dup xcheck
  138.             {
  139.             bind
  140.             } if
  141.         userdict 3 1 roll put
  142.         } forall
  143.     end
  144.     end
  145.     } ifelse
  146. } def
  147. /terminate            % - terminate -
  148. {
  149. } def
  150. /cshow                % proc string cshow -
  151. {
  152. exch
  153. Adobe_cshow_vars
  154.     exch /_cshow
  155.     exch put
  156.     {
  157.     0 0 Adobe_cshow_vars /_cshow get exec
  158.     } forall
  159. } def
  160. currentdict readonly pop end
  161. setpacking
  162. %%EndResource
  163. %%BeginResource: procset Adobe_customcolor 1.0 0
  164. %%Title: (Custom Color Operators)
  165. %%Version: 1.0
  166. %%CreationDate: (5/9/88) ()
  167. %%Copyright: ((C) 1987-1990 Adobe Systems Incorporated All Rights Reserved)
  168. currentpacking true setpacking
  169. userdict /Adobe_customcolor 5 dict dup begin put
  170. /initialize            % - initialize -
  171. {
  172. /setcustomcolor where
  173.     {
  174.     pop
  175.     }
  176.     {
  177.     Adobe_customcolor begin
  178.     Adobe_customcolor
  179.         {
  180.         dup xcheck
  181.             {
  182.             bind
  183.             } if
  184.         pop pop
  185.         } forall
  186.     end
  187.     Adobe_customcolor begin
  188.     } ifelse
  189. } def
  190. /terminate            % - terminate -
  191. {
  192. currentdict Adobe_customcolor eq
  193.     {
  194.     end
  195.     } if
  196. } def
  197. /findcmykcustomcolor    % cyan magenta yellow black name findcmykcustomcolor object
  198. {
  199. 5 packedarray
  200. }  def
  201. /setcustomcolor        % object tint setcustomcolor -
  202. {
  203. exch
  204. aload pop pop
  205. 4
  206.     {
  207.     4 index mul 4 1 roll
  208.     } repeat
  209. 5 -1 roll pop
  210. setcmykcolor
  211. } def
  212. /setoverprint        % boolean setoverprint -
  213. {
  214. pop
  215. } def
  216. currentdict readonly pop end
  217. setpacking
  218. %%EndResource
  219. %%BeginResource: procset Adobe_IllustratorA_AI3 1.0 2
  220. %%Title: (Adobe Illustrator (R) Version 3.0 Abbreviated Prolog)
  221. %%Version: 1.0
  222. %%CreationDate: (7/22/89) ()
  223. %%Copyright: ((C) 1987-1990 Adobe Systems Incorporated All Rights Reserved)
  224. currentpacking true setpacking
  225. userdict /Adobe_IllustratorA_AI3 61 dict dup begin put
  226. % initialization
  227. /initialize                % - initialize -
  228. {
  229. % 47 vars, but leave slack of 10 entries for custom Postscript fragments
  230. userdict /Adobe_IllustratorA_AI3_vars 57 dict dup begin put
  231. % paint operands
  232. /_lp /none def
  233. /_pf {} def
  234. /_ps {} def
  235. /_psf {} def
  236. /_pss {} def
  237. /_pjsf {} def
  238. /_pjss {} def
  239. /_pola 0 def
  240. /_doClip 0 def
  241. % paint operators
  242. /cf    currentflat def    % - cf flatness
  243. % typography operands
  244. /_tm matrix def
  245. /_renderStart [/e0 /r0 /a0 /o0 /e1 /r1 /a1 /i0] def
  246. /_renderEnd [null null null null /i1 /i1 /i1 /i1] def
  247. /_render -1 def
  248. /_rise 0 def
  249. /_ax 0 def            % x character spacing    (_ax, _ay, _cx, _cy follows awidthshow naming convention)
  250. /_ay 0 def            % y character spacing
  251. /_cx 0 def            % x word spacing
  252. /_cy 0 def            % y word spacing
  253. /_leading [0 0] def
  254. /_ctm matrix def
  255. /_mtx matrix def
  256. /_sp 16#020 def
  257. /_hyphen (-) def
  258. /_fScl 0 def
  259. /_cnt 0 def
  260. /_hs 1 def
  261. /_nativeEncoding 0 def
  262. /_useNativeEncoding 0 def
  263. /_tempEncode 0 def
  264. /_pntr 0 def
  265. /_tDict 2 dict def
  266. % typography operators
  267. /Tx {} def
  268. /Tj {} def
  269. % compound path operators
  270. /CRender {} def
  271. % printing
  272. /_AI3_savepage {} def
  273. % color operands
  274. /_gf null def
  275. /_cf 4 array def
  276. /_if null def
  277. /_of false def
  278. /_fc {} def
  279. /_gs null def
  280. /_cs 4 array def
  281. /_is null def
  282. /_os false def
  283. /_sc {} def
  284. /_i null def
  285. Adobe_IllustratorA_AI3 begin
  286. Adobe_IllustratorA_AI3
  287.     {
  288.     dup xcheck
  289.         {
  290.         bind
  291.         } if
  292.     pop pop
  293.     } forall
  294. end
  295. end
  296. Adobe_IllustratorA_AI3 begin
  297. Adobe_IllustratorA_AI3_vars begin
  298. newpath
  299. } def
  300. /terminate                % - terminate -
  301. {
  302. end
  303. end
  304. } def
  305. % definition operators
  306. /_                    % - _ null
  307. null def
  308. /ddef                % key value ddef -
  309. {
  310. Adobe_IllustratorA_AI3_vars 3 1 roll put
  311. } def
  312. /xput                % key value literal xput -
  313. {
  314. dup load dup length exch maxlength eq
  315.     {
  316.     dup dup load dup
  317.     length 2 mul dict copy def
  318.     } if
  319. load begin def end
  320. } def
  321. /npop                % integer npop -
  322. {
  323.     {
  324.     pop
  325.     } repeat
  326. } def
  327. % marking operators
  328. /sw                    % ax ay string sw x y
  329. {
  330. dup length exch stringwidth
  331. exch 5 -1 roll 3 index 1 sub mul add
  332. 4 1 roll 3 1 roll 1 sub mul add
  333. } def
  334. /swj                % cx cy fillchar ax ay string swj x y
  335. {
  336. dup 4 1 roll
  337. dup length exch stringwidth
  338. exch 5 -1 roll 3 index 1 sub mul add
  339. 4 1 roll 3 1 roll 1 sub mul add
  340. 6 2 roll /_cnt 0 ddef
  341. {1 index eq {/_cnt _cnt 1 add ddef} if} forall pop
  342. exch _cnt mul exch _cnt mul 2 index add 4 1 roll 2 index add 4 1 roll pop pop
  343. } def
  344. /ss                    % ax ay string matrix ss -
  345. {
  346. 4 1 roll
  347.     {                % matrix ax ay char 0 0 {proc} -
  348.     2 npop
  349.     (0) exch 2 copy 0 exch put pop
  350.     gsave
  351.     false charpath currentpoint
  352.     4 index setmatrix
  353.     stroke
  354.     grestore
  355.     moveto
  356.     2 copy rmoveto
  357.     } exch cshow
  358. 3 npop
  359. } def
  360. /jss                % cx cy fillchar ax ay string matrix jss -
  361. {
  362. 4 1 roll
  363.     {                % cx cy fillchar matrix ax ay char 0 0 {proc} -
  364.     2 npop
  365.     (0) exch 2 copy 0 exch put
  366.     gsave
  367.     _sp eq
  368.         {
  369.         exch 6 index 6 index 6 index 5 -1 roll widthshow
  370.         currentpoint
  371.         }
  372.         {
  373.         false charpath currentpoint
  374.         4 index setmatrix stroke
  375.         }ifelse
  376.     grestore
  377.     moveto
  378.     2 copy rmoveto
  379.     } exch cshow
  380. 6 npop
  381. } def
  382. % path operators
  383. /sp                    % ax ay string sp -
  384. {
  385.     {
  386.     2 npop (0) exch
  387.     2 copy 0 exch put pop
  388.     false charpath
  389.     2 copy rmoveto
  390.     } exch cshow
  391. 2 npop
  392. } def
  393. /jsp                    % cx cy fillchar ax ay string jsp -
  394. {
  395.     {                    % cx cy fillchar ax ay char 0 0 {proc} -
  396.     2 npop
  397.     (0) exch 2 copy 0 exch put
  398.     _sp eq
  399.         {
  400.         exch 5 index 5 index 5 index 5 -1 roll widthshow
  401.         }
  402.         {
  403.         false charpath
  404.         }ifelse
  405.     2 copy rmoveto
  406.     } exch cshow
  407. 5 npop
  408. } def
  409. % path construction operators
  410. /pl                % x y pl x y
  411. {
  412. transform
  413. 0.25 sub round 0.25 add exch
  414. 0.25 sub round 0.25 add exch
  415. itransform
  416. } def
  417. /setstrokeadjust where
  418.     {
  419.     pop true setstrokeadjust
  420.     /c                % x1 y1 x2 y2 x3 y3 c -
  421.     {
  422.     curveto
  423.     } def
  424.     /C
  425.     /c load def
  426.     /v                % x2 y2 x3 y3 v -
  427.     {
  428.     currentpoint 6 2 roll curveto
  429.     } def
  430.     /V
  431.     /v load def
  432.     /y                % x1 y1 x2 y2 y -
  433.     {
  434.     2 copy curveto
  435.     } def
  436.     /Y
  437.     /y load def
  438.     /l                % x y l -
  439.     {
  440.     lineto
  441.     } def
  442.     /L
  443.     /l load def
  444.     /m                % x y m -
  445.     {
  446.     moveto
  447.     } def
  448.     }
  449.     {%else
  450.     /c
  451.     {
  452.     pl curveto
  453.     } def
  454.     /C
  455.     /c load def
  456.     /v
  457.     {
  458.     currentpoint 6 2 roll pl curveto
  459.     } def
  460.     /V
  461.     /v load def
  462.     /y
  463.     {
  464.     pl 2 copy curveto
  465.     } def
  466.     /Y
  467.     /y load def
  468.     /l
  469.     {
  470.     pl lineto
  471.     } def
  472.     /L
  473.     /l load def
  474.     /m
  475.     {
  476.     pl moveto
  477.     } def
  478.     }ifelse
  479. % graphic state operators
  480. /d                    % array phase d -
  481. {
  482. setdash
  483. } def
  484. /cf    {} def            % - cf flatness
  485. /i                    % flatness i -
  486. {
  487. dup 0 eq
  488.     {
  489.     pop cf
  490.     } if
  491. setflat
  492. } def
  493. /j                    % linejoin j -
  494. {
  495. setlinejoin
  496. } def
  497. /J                    % linecap J -
  498. {
  499. setlinecap
  500. } def
  501. /M                    % miterlimit M -
  502. {
  503. setmiterlimit
  504. } def
  505. /w                    % linewidth w -
  506. {
  507. setlinewidth
  508. } def
  509. % path painting operators
  510. /H                    % - H -
  511. {} def
  512. /h                    % - h -
  513. {
  514. closepath
  515. } def
  516. /N                    % - N -
  517. {
  518. _pola 0 eq
  519.     {
  520.     _doClip 1 eq {clip /_doClip 0 ddef} if
  521.     newpath
  522.     }
  523.     {
  524.     /CRender {N} ddef
  525.     }ifelse
  526. } def
  527. /n                    % - n -
  528. {N} def
  529. /F                    % - F -
  530. {
  531. _pola 0 eq
  532.     {
  533.     _doClip 1 eq
  534.         {
  535.         gsave _pf grestore clip newpath /_lp /none ddef _fc
  536.         /_doClip 0 ddef
  537.         }
  538.         {
  539.         _pf
  540.         }ifelse
  541.     }
  542.     {
  543.     /CRender {F} ddef
  544.     }ifelse
  545. } def
  546. /f                    % - f -
  547. {
  548. closepath
  549. F
  550. } def
  551. /S                    % - S -
  552. {
  553. _pola 0 eq
  554.     {
  555.     _doClip 1 eq
  556.         {
  557.         gsave _ps grestore clip newpath /_lp /none ddef _sc
  558.         /_doClip 0 ddef
  559.         }
  560.         {
  561.         _ps
  562.         }ifelse
  563.     }
  564.     {
  565.     /CRender {S} ddef
  566.     }ifelse
  567. } def
  568. /s                    % - s -
  569. {
  570. closepath
  571. S
  572. } def
  573. /B                    % - B -
  574. {
  575. _pola 0 eq
  576.     {
  577.     _doClip 1 eq     % F clears _doClip
  578.     gsave F grestore
  579.         {
  580.         gsave S grestore clip newpath /_lp /none ddef _sc
  581.         /_doClip 0 ddef
  582.         }
  583.         {
  584.         S
  585.         }ifelse
  586.     }
  587.     {
  588.     /CRender {B} ddef
  589.     }ifelse
  590. } def
  591. /b                    % - b -
  592. {
  593. closepath
  594. B
  595. } def
  596. /W                    % - W -
  597. {
  598. /_doClip 1 ddef
  599. } def
  600. /*                    % - [string] * -
  601. {
  602. count 0 ne
  603.     {
  604.     dup type (stringtype) eq {pop} if
  605.     } if
  606. _pola 0 eq {newpath} if
  607. } def
  608. % group operators
  609. /u                    % - u -
  610. {} def
  611. /U                    % - U -
  612. {} def
  613. /q                    % - q -
  614. {
  615. _pola 0 eq {gsave} if
  616. } def
  617. /Q                    % - Q -
  618. {
  619. _pola 0 eq {grestore} if
  620. } def
  621. /*u                    % - *u -
  622. {
  623. _pola 1 add /_pola exch ddef
  624. } def
  625. /*U                    % - *U -
  626. {
  627. _pola 1 sub /_pola exch ddef
  628. _pola 0 eq {CRender} if
  629. } def
  630. /D                    % polarized D -
  631. {pop} def
  632. /*w                    % - *w -
  633. {} def
  634. /*W                    % - *W -
  635. {} def
  636. % place operators
  637. /`                    % matrix llx lly urx ury string ` -
  638. {
  639. /_i save ddef
  640. 6 1 roll 4 npop
  641. concat pop
  642. userdict begin
  643. /showpage {} def
  644. 0 setgray
  645. 0 setlinecap
  646. 1 setlinewidth
  647. 0 setlinejoin
  648. 10 setmiterlimit
  649. [] 0 setdash
  650. newpath
  651. 0 setgray
  652. false setoverprint
  653. } def
  654. /~                    % - ~ -
  655. {
  656. end
  657. _i restore
  658. } def
  659. % color operators
  660. /O                    % flag O -
  661. {
  662. 0 ne
  663. /_of exch ddef
  664. /_lp /none ddef
  665. } def
  666. /R                    % flag R -
  667. {
  668. 0 ne
  669. /_os exch ddef
  670. /_lp /none ddef
  671. } def
  672. /g                    % gray g -
  673. {
  674. /_gf exch ddef
  675. /_fc
  676. {
  677. _lp /fill ne
  678.     {
  679.     _of setoverprint
  680.     _gf setgray
  681.     /_lp /fill ddef
  682.     } if
  683. } ddef
  684. /_pf
  685. {
  686. _fc
  687. fill
  688. } ddef
  689. /_psf
  690. {
  691. _fc
  692. ashow
  693. } ddef
  694. /_pjsf
  695. {
  696. _fc
  697. awidthshow
  698. } ddef
  699. /_lp /none ddef
  700. } def
  701. /G                    % gray G -
  702. {
  703. /_gs exch ddef
  704. /_sc
  705. {
  706. _lp /stroke ne
  707.     {
  708.     _os setoverprint
  709.     _gs setgray
  710.     /_lp /stroke ddef
  711.     } if
  712. } ddef
  713. /_ps
  714. {
  715. _sc
  716. stroke
  717. } ddef
  718. /_pss
  719. {
  720. _sc
  721. ss
  722. } ddef
  723. /_pjss
  724. {
  725. _sc
  726. jss
  727. } ddef
  728. /_lp /none ddef
  729. } def
  730. /k                    % cyan magenta yellow black k -
  731. {
  732. _cf astore pop
  733. /_fc
  734. {
  735. _lp /fill ne
  736.     {
  737.     _of setoverprint
  738.     _cf aload pop setcmykcolor
  739.     /_lp /fill ddef
  740.     } if
  741. } ddef
  742. /_pf
  743. {
  744. _fc
  745. fill
  746. } ddef
  747. /_psf
  748. {
  749. _fc
  750. ashow
  751. } ddef
  752. /_pjsf
  753. {
  754. _fc
  755. awidthshow
  756. } ddef
  757. /_lp /none ddef
  758. } def
  759. /K                    % cyan magenta yellow black K -
  760. {
  761. _cs astore pop
  762. /_sc
  763. {
  764. _lp /stroke ne
  765.     {
  766.     _os setoverprint
  767.     _cs aload pop setcmykcolor
  768.     /_lp /stroke ddef
  769.     } if
  770. } ddef
  771. /_ps
  772. {
  773. _sc
  774. stroke
  775. } ddef
  776. /_pss
  777. {
  778. _sc
  779. ss
  780. } ddef
  781. /_pjss
  782. {
  783. _sc
  784. jss
  785. } ddef
  786. /_lp /none ddef
  787. } def
  788. /x                    % cyan magenta yellow black name gray x -
  789. {
  790. /_gf exch ddef
  791. findcmykcustomcolor
  792. /_if exch ddef
  793. /_fc
  794. {
  795. _lp /fill ne
  796.     {
  797.     _of setoverprint
  798.     _if _gf 1 exch sub setcustomcolor
  799.     /_lp /fill ddef
  800.     } if
  801. } ddef
  802. /_pf
  803. {
  804. _fc
  805. fill
  806. } ddef
  807. /_psf
  808. {
  809. _fc
  810. ashow
  811. } ddef
  812. /_pjsf
  813. {
  814. _fc
  815. awidthshow
  816. } ddef
  817. /_lp /none ddef
  818. } def
  819. /X                    % cyan magenta yellow black name gray X -
  820. {
  821. /_gs exch ddef
  822. findcmykcustomcolor
  823. /_is exch ddef
  824. /_sc
  825. {
  826. _lp /stroke ne
  827.     {
  828.     _os setoverprint
  829.     _is _gs 1 exch sub setcustomcolor
  830.     /_lp /stroke ddef
  831.     } if
  832. } ddef
  833. /_ps
  834. {
  835. _sc
  836. stroke
  837. } ddef
  838. /_pss
  839. {
  840. _sc
  841. ss
  842. } ddef
  843. /_pjss
  844. {
  845. _sc
  846. jss
  847. } ddef
  848. /_lp /none ddef
  849. } def
  850. % locked object operator
  851. /A                    % value A -
  852. {
  853. pop
  854. } def
  855. currentdict readonly pop end
  856. setpacking
  857. % annotate page operator
  858. /annotatepage
  859. {
  860. } def
  861. %%EndResource
  862. %%EndProlog
  863. %%BeginSetup
  864. Adobe_cmykcolor /initialize get exec
  865. Adobe_cshow /initialize get exec
  866. Adobe_customcolor /initialize get exec
  867. Adobe_IllustratorA_AI3 /initialize get exec
  868. %%EndSetup
  869. ÿ%%PageTrailer
  870. gsave annotatepage grestore showpage
  871. %%Trailer
  872. Adobe_IllustratorA_AI3 /terminate get exec
  873. Adobe_customcolor /terminate get exec
  874. Adobe_cshow /terminate get exec
  875. Adobe_cmykcolor /terminate get exec
  876. Adobe_packedarray /terminate get exec
  877. %%EOF
  878.